#对象clone。 以大写开头是类型，赋值type槽 小写的是复制品
"hello world" println
Car := Object clone
Car type println
#槽
Car color := "red"
Car color println
Lunzi := Object clone
Car lunzi := Lunzi
Car lunzi println
Ship := Object clone
#Car := Ship clone
car := Car clone
car slotNames println
car color println
car proto println
Lobby println
Object slotNames sort println
Contact name ::= nil #创建槽，设置set方法，赋值
 holmes := Contact clone setName("Holmes")
"-------------------" println
#方法 block  The default return value of a block is the result of the last expression.
method() type println #Block
Block slotNames println
Object getSlot("method") println #result is Object_methon()

Car drive := method(who, who + " is moving" println) #字符串怎么拼接啊
car drive("mycar")
Car getSlot("drive") println
Falali := Car clone
Falali getSlot("drive") println
Car getSlot("drive") scope 
block(x, x*2) scope
"-------------------" println
Object removeSlot("clone")
